home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 2004 December
/
2004-12 CHIP.iso
/
Internet
/
The Bat! Professional 3.01
/
thebat_professional.msi
/
Data1.cab
/
thebat.exe
/
0
/
RCDATA
/
TFOLDERSELECTOR
/
TFOLDERSELECTOR.txt
Wrap
Text File
|
2004-10-12
|
2KB
|
106 lines
object FolderSelector: TFolderSelector
Left = 199
Top = 126
BorderIcons = [biSystemMenu]
BorderStyle = bsDialog
Caption = 'Select a folder'
ClientHeight = 341
ClientWidth = 409
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = True
Position = poScreenCenter
OnClose = FormClose
OnCloseQuery = FormCloseQuery
OnCreate = FormCreate
DesignSize = (
409
341)
PixelsPerInch = 96
TextHeight = 13
object bOK: TButton
Left = 296
Top = 8
Width = 107
Height = 25
Anchors = [akTop, akRight]
Caption = '&OK'
Default = True
ModalResult = 1
TabOrder = 1
end
object bCancel: TButton
Left = 296
Top = 48
Width = 107
Height = 25
Anchors = [akTop, akRight]
Cancel = True
Caption = 'Cancel'
ModalResult = 2
TabOrder = 2
end
object bNew: TButton
Left = 296
Top = 303
Width = 109
Height = 25
Anchors = [akRight, akBottom]
Caption = 'New...'
Enabled = False
TabOrder = 3
OnClick = bNewClick
end
object mlFolders: TMLVGrid
Left = 8
Top = 8
Width = 281
Height = 320
Anchors = [akLeft, akTop, akRight, akBottom]
ColCount = 1
DefaultRowHeight = 16
DefaultDrawing = False
FixedCols = 0
RowCount = 1
FixedRows = 0
Options = [goThumbTracking]
TabOrder = 0
OnDblClick = mlFoldersDblClick
OnKeyDown = mlFoldersKeyDown
OnMouseDown = mlFoldersMouseDown
AltDrag = True
AutoColResize = True
AutoSearch = True
MultiSelect = False
OnFocusItem = mlFoldersFocusItem
ImmediateSelect = False
OnDrawItemImage = mlFoldersDrawItemImage
end
object bSelectAll: TButton
Left = 296
Top = 96
Width = 107
Height = 25
Anchors = [akTop, akRight]
Caption = 'Select &All'
TabOrder = 4
Visible = False
OnClick = bSelectAllClick
end
object bUnselectAll: TButton
Left = 296
Top = 136
Width = 107
Height = 25
Anchors = [akTop, akRight]
Caption = '&Unselect all'
TabOrder = 5
Visible = False
OnClick = bSelectAllClick
end
end